;; 测试lambda表达式的基本功能

(display "测试lambda表达式\n")

(define add (lambda (a b) (+ a b)))
(display "(add 2 3) = ")
(display (add 2 3))
(display "\n")

;; 测试匿名lambda表达式
(display "((lambda (x) (* x x)) 5) = ")
(display ((lambda (x) (* x x)) 5))
(display "\n")

(display "测试完成！\n")